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Polymorphic  typing  of  variables  and  references  is  considered  in  [1].  However,  a 
treatment  of  the  address-of  operator  *&;’  in  the  context  of  nonweak  types  is  not  given. 
The  operator  is  treated  in  [2]  but  only  in  the  context  of  weak  types,  since  every  type  in 
that  system  is  weak.  In  this  note,  the  semantics  and  subject  reduction  theorem  of  [1] 
are  reformulated  in  order  to  accomodate  in  the  presence  of  nonweak  types. 

The  syntax  of  the  language  in  [1]  is  extended  as  follows: 

(Expressions)  e  ::=  ke  \  /.I 
(Values)  V  ::=  l.Q 

Meta- variable  /  ranges  over  locations.  We  say  /.I  is  a  variable  and  l.O  is  a  reference. 
Unlike  references,  variables  are  not  values.  Variables  and  references  replace  variable 
locations  and  reference  locations  respectively  in  the  syntax  of  [1]. 

Typing  rules  (refloc)  and  (VARLOC)  of  [1]  are  changed  and  a  typing  rule  for  ‘k’ 
is  added — see  Figure  1.  The  domain  of  a  location  typing  is  no  longer  partitioned  into 
variable  and  reference  locations. 

Some  changes  are  needed  in  the  evaluation  rules.  These  changes  are  reflected  in  the 
new  rules  given  in  Figure  2. 

We  now  turn  to  subject  reduction.  First,  we  introduce  some  lemmas: 

Lemma  1  (Superfluousness)  //A;7  H  e  :  r  and  I  ^  dom(X),  then  A[/  :  t'];7  h  e  :  r. 

Lemma  2  (Substitution)  If  h  v  :  a  and  A;  7(3:  :  cr]  I-  e  :  r,  then  A;7  h  [n/z]e  :  t. 
.4/so,  if  X-,j  h  /.I  :  r  var  and  A;7[x  :  r  var]  h  e  :  r',  then  A;7  h  [/.l/z]e  :  r'. 

(refloc)  X;j  \- l.O  :  t  ref  X(l)  =  r 

(VARLOC)  A;7  h  /.I  :  r  var  X(l)  =  r 

(address)  A;7l-e:  roar,  r  is  weak 
A;  7  1-  &  e  :  T  ref 

Figure  1:  New  Rules  of  the  Type  System 
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(contents)  P  h  /.I 
(bindvar)  /j  h  ei  => 

/  ^  doTn(fii) 

fii[l  t)i]  h  [/.l/z]e2  =>  V2, 11-2 
ft  h  letvar  x  Cj  in  63  =>  i’2iP2 

(update)  h  e  ^  _ 

ft  i-  l.l  :=  e  =>  unit,  ft'[l  :=  t;] 

/i  h  ei  =►  l.0,fti 

Pi  h  62  =>  P,P2 _ 

ft  I-  tei-  :=  62  ^  unit,  p2[/  :=  i*] 

(addrof)  ft\-  kl.l  ^  l.O,  ft 

ft\-  e  ^  l.O,  ft' 
ft  h  k  *  e  l.O,  ft' 

(alloc)  ft\-e^v,fi' 

I  ^  dom{fi') 

ft  h  ref  6  =>■  l.O,  ft' [I  :=  v] 

(deref)  p  h  6  ^  10,m' 

p  h  *6  =>  ft'{l),ft' 

Figure  2;  The  New  Evaluation  Rules 
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Lemma  3  (V-intro)  If  X;'f  h  e  :  cr  and  a  does  not  occur  free  in  X  or  in  j,  then  A;7l- 
e  :  Va  .  (T. 

Lemma  4  If  X[l  :  r];7  h  e  :  r'  and  I  does  not  occur  in  e,  then  A;7  h  e  :  r'. 

The  preceding  lemmas  are  straightforward  variants  of  those  in  [1]. 

The  subject  reduction  theorem  now  becomes: 

Theorem  5  Suppose  that  fi  h  e  =:>■  v,  fi' ,  X  h  e  :  r,  fi  :  X,  and  X{1)  is  weak  ifl.l  occurs 
in  the  range  of  fi  or  in  a  X-abstraction  in  e,  or  1.0  occurs  in  the  range  of  or  in  e.  Then 
there  exists  a  X'  such  that  X  C  A',  p.'  :  A',  A'  h  u  :  t,  and  X'{1)  is  weak  if  l.l  or  l.Q  occurs 
in  the  range  of  p'  or  in  v. 

Proof.  The  proof  is  by  induction  on  the  structure  of  the  derivation  of  p  f-  e  =>  v,  /i'. 

For  brevity,  we  present  only  the  interesting  cases:  (BIND),  when  ei  is  not  a  value, 
and  the  evaluation  rules  of  Figure  2. 

(bind).  Suppose  ei  is  not  a  value.  Then  the  evaluation  must  end  with 

p\-  ei  vi,pi 

Pi  h  [t)i/g]e2  =>  U2,/J2 _ 

p  h  let  X  =  ei  in  62  =>  V2,P2 

while  the  typing  must  end  with 

A  1-  ei  :  n 

A;  [x  :  AppClosexin)]  b  62  •  i'2 
A  h  let  X  =  61  in  62  :  r2 

Also,  p  :  X  and  A(/)  is  weak  if  either  /.I  occurs  in  the  range  of  /i  or  in  a  A-abstraction  in 
61  or  62,  or  l.O  occurs  in  the  range  of  p  or  in  ei  or  63. 

By  induction,  there  exists  a  Ai  such  that  A  C  Ai,  /ii  :  Ai,  Ai  t-  ri  :  ri,  and  Ai(/)  is 
weak  if  1.1  or  l.O  occurs  in  the  range  of  pi  or  in  vi. 

Now  to  apply  induction  again  we  want  to  show  that 


Ai  F  [vilx]e2  :  T2. 


By  Lemma  1  we  have 

Ai;  [x  :  AppClosei^{Ti)\  h  62  :  T2, 

so  we  can  apply  Lemma  2  to  get  what  we  want  provided  that  we  can  show 

Ai  h  vi  :  AppClosexiri). 

Now,  applying  Lemma  3  to  Ai  h  vi  :  ti  we  can  get  Ai  h  ui  :  AppClose)^^{Ti),  but  this  is 
not  good  enough,  because  Ai  may  contain  free  strong  type  variables  that  are  not  free  in 
A.  To  proceed,  we  exploit  our  knowledge  about  what  locations  can  occur  in  Ui. 

Let  Aj"  be  formed  by  removing  from  Ai  any  typings  /  :  r  such  that  r  is  not  weak. 
By  the  above  use  of  induction,  this  process  does  not  remove  any  typings  of  locations 
that  occur  in  ui,  cis  all  such  locations  have  weak  types.  So  by  Lemma  4,  Aj)  F  i;i  : 
ri.  Hence,  by  Lemma  3,  Aj"  F  ui  :  App Close since  Aj"  contains  no  strong  type 
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variables.  Lemma  1  then  gives  Ai  h  ni  :  AppClosej^(Ti),  and  finally  by  Lemma  2  we  get 
Ai  h  [vilx\e2  :  T2. 

By  the  use  of  induction  above,  Ai(/)  is  weak  if  1.1  or  /.O  occurs  in  the  range  of  jii. 
If  a  variable  /.I  occurs  in  a  A-abstraction  in  {vi/x\e2,  then  either  it  occurs  in  vi  or  in 
a  A-abstraction  in  62-  In  the  first  case,  Ai(/)  is  weak  by  the  above  use  of  induction; 
in  the  second  case,  A(/)  is  weak  by  the  hypothesis,  and  so  Ai(/)  is  weak  since  A  C  Ai. 
Furthermore,  if  a  reference  l.O  occurs  in  [vi/x]e2,  then  either  it  occurs  in  or  62-  In 
the  former  case,  Ai(/)  is  weak  by  the  above  use  of  induction,  and  in  the  latter,  A(l)  is 
weak  by  the  hypothesis,  and  so  Ai(/)  is  weak. 

Hence  we  can  use  induction  a  second  time  to  show  that  there  exists  a  A'  such  that 
Ai  C  A',  /r2  :  A',  A'  h  ?;2  ;  r2,  and  A'(/)  is  weak  if  /.I  or  l.O  occurs  in  the  range  of  /i2  or 
in  V2.  Since  A  C  Ai  C  A',  we  are  done. 

(bindvar).  The  evaluation  must  end  with 

pih  ei  =>  vufii 

I  ^  dom(fii) 

mil  :=  m]  h  [/.l/x]e2  =>  V2,^i2 
/i  h  letvar  x  :=  ei  in  €2  =>  V2, 1^2 

while  the  typing  must  end  with 

A  h  ei  :  n 

A;  [x  :  Ti  t;ar]  h  e2  :  r2 

If  X  occurs  in  a  A-abstraction  in  e2  then  ri  is  weak. 

A  h  letvar  x  :=  ei  in  62  :  T2 

Also,  jx  :  A  and  A(/')  is  weak  if  either  /M  occurs  in  the  range  of  ^  or  in  a  A-abstraction 
in  ei  or  62,  or  I'  .0  occurs  in  the  range  of  n  or  in  ei  or  62. 

By  induction,  there  exists  a  Ai  such  that  A  C  Ai,  :  Ai,  Ai  h  ui  :  ri,  and  Ai(/')  is 
weak  if  /'.I  or  /'.O  occurs  in  the  range  of  or  in  vx. 

Since  I  ^  (fom(Ai),  Ai  C  Ai[/  :  xi]. 

Since  Ai[/  :  Xj]  h  l.\  :  Xi  var  and  (by  Lemma  1)  Ai[/  :  Xi];  [x  :  xi  var]  H  62  :  X2,  we 
can  apply  Lemma  2  to  get 

Ai[/  :  xi]  h  [/.l/x]e2  :  X2 
Also,  ^x[l  :=  ui]  :  Ai[/  :  xj  by  Lemma  1. 

Next,  by  the  use  of  induction  above,  Ai(/')  is  weak  if  /M  or  I'.O  occurs  in  the  range  of 
/Ji[/  ;=  vi].  Thus,  Ai[/  :  xi](/')  is  weak  since  Aj  C  Ai[/  :  Xi].  Now  suppose  that  a  variable 
I'.l  occurs  in  a  A-abstraction  in  [/.l/x]e2.  Then  either  /'.I  occurs  in  a  A-abstraction  in  62, 
or  else  /'  =  /  and  x  occurs  in  a  A-abstraction  in  62.  In  the  first  case,  by  the  hypothesis, 
A(/')  is  weak  and  so  Ai[/  :  Xi](/')  is  weak.  In  the  second  case,  by  the  restriction  on  the 
(letvar)  rule,  xi  is  weak,  and  so  Ai[/ :  xi](/')  is  weak.  Finally,  if  I'.O  occurs  in  [/.l/x]e2 
then  it  occurs  in  62.  Thus,  by  the  hypothesis,  A(/')  is  weak  and  so  Ai[/  :  xi](/')  is  weak. 

So  by  a  second  use  of  induction,  there  exists  a  A'  such  that  Ai[/  :  xi]  C  A',  112  :  A', 
A'  h  t;2  :  X2,  and  A'(F)  is  weak  if  I'.l  or  /'.O  occurs  in  the  range  of  /i2  or  in  V2.  Since 
A  C  Ai  C  Ai[/  :  xi]  C  A',  we  are  done. 

(addrof).  Suppose  the  evaluation  ends  with 

/i  h  &:  /.I  =t>  l.O,  fi 
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while  the  typing  ends  with 


A  h  /.I  :  r  var,  r  is  weak 
A  h  &  /.I  :  r  ref 

Also,  fj.  :  A  and  A(/')  is  weak  if  either  /M  or  /'.O  occurs  in  the  range  of  fi.  Since 
A  h  /.I  :  r  var,  we  have  A(/)  =  r  by  rule  (varloc).  Thus,  A  h  /.O  :  r  ref  by  (refloc). 
Furthermore,  by  the  restriction  on  rule  (ADDRESS),  r,  or  A(/),  is  weak. 

Now  suppose  the  evaluation  ends  with 

fib  e  =>■  l.Oyfi' 
t-  &  +  e  =>  /.O,  /i' 


while  the  typing  ends  with 


A  t-  e  :  T  ref 

A  h  *e  :  r  var,  r  is  weak 
A  H  &  ♦  e  :  r  ref 

Also,  n  :  A  and  A(/')  is  weak  if  /'.I  occurs  in  the  range  of  /i  or  in  a  A-abstraction  in  e,  or 
/'.O  occurs  in  the  range  of  n  or  in  e. 

By  induction,  there  is  a  A'  such  that  A  C  A',  n'  :  A',  A'  h  /.O  :  r  ref,  \'{l)  is  weak, 
and  A'(l')  is  weak  if  /'.I  or  I'.Q  occurs  in  the  range  of  /i'.  And,  we’re  done. 

(contents).  The  evaluation  must  end  with 

/jH /.I  =}►/!(/), /i 


while  the  typing  must  end  with 


A  I-  /.I  :  r  var 
Ah/.l  :r 

Also,  fi  :  A  and  A(/')  is  weak  if  either  /'.I  or  I'.O  occurs  in  the  range  of  fi.  From  /i  :  A,  we 
have  A  h  fi{l)  :  A(/).  Since  A  H  /.I  :  r  var,  we  have  A(/)  =  r,  so  A  h  fi{l)  :  t. 

(update).  Suppose  the  evaluation  ends  with 

fib  e  =>  v,fi' 

fib  1. 1  :=  e  =>  unit,  fi'[l  :=  n] 

while  the  typing  ends  with 

Ah/.l  :  r  var 
Xb  e  :  T 

A  h  /.I  :=  e  :  unit 

Also,  fi  :  A  and  A(/')  is  weak  if  /M  occurs  in  the  range  of  ^  or  in  a  A-abstraction  in  e,  or 
/'.O  occurs  in  the  range  of  fi  or  in  e. 

By  induction,  there  exists  a  A'  such  that  A  C  A',  fi'  :  X' ,  X'  b  v  :  t,  and  X'[l')  is  weak 
if  /'.I  or  I'.O  occurs  in  the  range  of  fi'  or  in  v. 

By  rule  (lit).  A'  h  unit  ;  unit.  Since  A  h  /.I  :  r  var,  A(/)  =  r  by  (VARLOC).  So 
/  G  dom{X')  since  A  C  A',  and  thus  dom{fi'[l  :=  u])  =  dom{X').  If  /'  is  a  location  such 
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that  I'  ^  /,  then  A'  h  ;  A'(/')  since  //'  :  A'.  If  /'  =  /  then  /i'[/  :=  !;](/')  =  v.  So 

A'  h  /j'[/  :=  !'](/')  :  T  since  A'  h  v  :  r.  Thus,  p'[/  :=  u]  :  A'.  Finally,  by  the  above  use  of 
induction,  A'(/')  is  weak  if  /'.I  or  /'.O  occurs  in  the  range  of  //'[/  :=  t;]. 

Now  suppose  the  evaluation  ends  with 

//  b  Cl  => 

I-  62  =>  v,n-i _ 

^  I-  *ei  ~  62  unit,/i2[/  ;=  t^] 


while  the  typing  ends  with 

A  h  +61  :  T  var 

A  I-  62  :  r _ 

A  b  +6i  :=  62  :  unit 

Also,  n  :  A  and  A(/')  is  weak  if  /'.I  occurs  in  the  range  of  /j  or  in  a  A-abstraction  in  ei 
or  62,  or  I'.Q  occurs  in  the  range  of  y.  or  in  ei  or  e^. 

By  rule  (l-val),  A  b  61  :  r  ref.  By  induction,  there  exists  a  Ai  such  that  A  C  Ai, 
Hi  :  Ai,  Ai  b  /.O  :  r  re/,  Ai(/)  is  weak,  and  Ai(/')  is  weak  if  I'.l  or  I'.O  occurs  in  the  range 
of  yi-  By  Lemma  1,  Ai  b  62  :  r.  Suppose  that  a  variable  I'.l  occurs  in  a  A-abstraction 
in  62-  Then  by  the  hypothesis,  A(/')  is  weak  and  so  is  Ai(/')  since  A  C  Ai.  Likewise,  if 
/',0  occurs  in  62,  then  A(/')  is  weak  and  thus  so  is  Ai(/'). 

So  by  a  second  use  of  induction,  there  is  a  A'  such  that  Ai  C  A',  /i2  :  A',  A'  b  u  :  r, 
and  A'(/')  is  weak  if  /'.I  or  I'.O  occurs  in  the  range  of  y2  or  in  v.  The  proof  is  now  similar 
to  the  first  (update)  case  above. 

(alloc).  The  evaluation  must  end  with 

yh  e=i’V,y' 

I  ^  dom[y') 

y  b  ref  6  =►  t.0,y'[l  :=  f] 

while  the  typing  ends  with 

A  b  6  :  r,  r  is  weak 
A  b  ref  6  :  r  ref 

Also,  y  :  A  and  A(/')  is  weak  if  /'.I  occurs  in  the  range  of  /j  or  in  a  A-abstraction  in  e,  or 
I'  .0  occurs  in  the  range  of  //  or  in  e. 

By  induction,  there  exists  a  A'  such  that  A  C  A',  y'  :  A',  A'  b  v  :  r,  and  A'(/')  is  weak 
if  /'.I  or  I'.O  occurs  in  the  range  of  y'  or  in  v. 

Now  A'  C  A'[/  :  r]  since  I  ^  dom{y'). 

By  Lemma  1  and  the  above  use  of  induction,  y'[l  :=  v]  ;  A'[/  :  r].  Furthermore, 
A'[/  :  r]  b  /.O  :  r  ref  by  rule  (refloc).  Again  by  the  above  use  of  induction,  A'(/')  is 
weak  if  I' .1  or  I' .0  occurs  in  the  range  of  y'{l  :=  u],  and  hence  A'[/  :  r](/')  is  weak  since 
A'  C  A'[/  :  r].  Finally,  A'[/  :  r](/)  =  r  and  r  is  weak  by  the  restriction  on  rule  (ref), 
(deref).  The  evaluation  must  end  with 

/i  b  6  =>  l.O,  y' 
y\-  *e^  y'{l),y' 
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while  the  typing  ends  with 

A  h  e  :  r  ref 
A  h  +e  :  T  var 
X\-  *e  :  T 

Also,  fj.  :  A  and  A(/')  is  weak  if  /'.I  occurs  in  the  range  of  /i  or  in  a  A-abstraction  in  e,  or 
I'.O  occurs  in  the  range  of  p  or  in  e. 

By  induction,  there  exists  a  A'  such  that  A  C  A',  /i'  :  A',  A'  h  /.O  :  r  ref,  X'(l)  is  weak, 
and  A'(/')  is  weak  if  /'.I  or  I'.Q  occurs  in  the  range  of  y,' . 

Since  A'  1-  /.O  :  r  ref,  X'(l)  =  r  by  rule  (refloc).  Now  X'  h  //'(/)  :  X'(l),  since  y'  :  A', 
so  A'  h  y'{l)  :  r.  □ 
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